// tEST NOW

     for (ti=0;ti<10;++ti)
      es[ti]=snam[ti]+ti*2;

     for (ti=0;ti<10;++ti)
      es[ti]=es[ti]+stow[ti];
      
      
       es[0]=es[2]+es[3];
       es[4]=es[5]*es[1];
       es[9]=es[7]*es[8]*es[9];
       es[3]=es[1]*es[1]*es[1];
       es[7]=es[0]+es[1]+es[2]+es[3];
        es[4]=es[4]+snam[5]*snam[4];
         es[6]=es[0]+snam[3]*snam[7];
       
     for (ti=0;ti<10;++ti)
      if (es[ti]<0) es[ti]=es[ti]*-1;

     for (ti=0;ti<10;++ti)
       es[ti]=es[ti]%10+'0';


     /* VERGLEICHEN */
     tii=0;
     for (ti=0;ti<9;++ti)
     if ((es[ti])==(snum[ti]))
     {  } else { tii=1;
      };